﻿#region Copyright Statement
//  ------------------------------------------------------------------------------
//  
//    This file is part of The Streambolics Library.
//    Copyright © 2005-2009, Stephan Leclercq & Streambolics
//    All rights reserved.
//  
//    The Streambolics Library is free software; you can redistribute it and/or modify
//    it under the terms of the GNU General Public License as published by
//    the Free Software Foundation; either version 2 of the License, or
//    (at your option) any later version.
//  
//    The Streambolics Library is distributed in the hope that it will be useful,
//    but WITHOUT ANY WARRANTY; without even the implied warranty of
//    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
//    GNU General Public License for more details.
//  
//    You should have received a copy of the GNU General Public License
//    along with Streambolics; if not, write to the Free Software
//    Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
//  
//  ------------------------------------------------------------------------------
#endregion

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Reflection;

namespace Streambolics.Hp41s
{
    /// <summary>
    ///     Indicates that the field is a ready-made instruction
    ///     taking no argument, that can be inserted as is in a program.
    /// </summary>
    /// <remarks><para>
    ///     The attribute is normally used on static readonly fields of type
    ///     Instruction, containing an instruction that was built during
    ///     initialization.
    /// </para></remarks>
    /// <example>
    ///     The CommonInstructions class provides examples for the
    ///     usage of this attribute.
    /// </example>

    [AttributeUsage (AttributeTargets.Field, AllowMultiple = true)]
    public class SimpleInstructionAttribute : InstructionAttribute
    {
        public SimpleInstructionAttribute (string aText)
            : base (aText)
        {
        }

        internal override void Register (MemberInfo aMember, Catalog aParser)
        {
            if (aMember is FieldInfo)
            {
                FieldInfo f = (FieldInfo)aMember;
                aParser.AddReadyMadeInstruction (Prefix, (Instruction)f.GetValue (null));
            }
        }
    }
}
